home *** CD-ROM | disk | FTP | other *** search
/ BCI NET 2 / BCI NET 2.iso / archives / programming / c / gcc263-inclib.lha / gnu / geninline / mklibamiga / gluesrc1.lha / small / SetMode.s < prev    next >
Encoding:
Text File  |  1994-09-27  |  198 b   |  15 lines
  1. .text; .even; .globl _SetMode
  2.  
  3. _SetMode:
  4.     movel a6,sp@-
  5.     movel d2,sp@-
  6.     movel a4@(_DOSBase:W),a6
  7.     movel sp@(12),d1
  8.     movel sp@(16),d2
  9. #APP
  10.     jsr a6@(-0x1aa)
  11. #NO_APP
  12.     movel sp@+,d2
  13.     movel sp@+,a6
  14.     rts
  15.